(Fadd_text_properties): Don't return without ungcpro.

diff --git a/src/textprop.c b/src/textprop.c
index 5f249b59b9929b9443af75b59842dfaffeb3f3e2..5e9daf99fd0c5f16cf7aff8cdb4db68aeff7c872 100644 (file)
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -885,7 +885,7 @@ Return t if any property value actually changed, nil otherwise.")
        {
          int got = (LENGTH (i) - (s - i->position));
          if (got >= len)
-           return Qnil;
+           RETURN_UNGCPRO (Qnil);
          len -= got;
          i = next_interval (i);
        }